3.6.44 \(\int \frac {(1+x) (1+2 x+x^2)^5}{x^{18}} \, dx\)

Optimal. Leaf size=73 \[ -\frac {(x+1)^{12}}{17 x^{17}}+\frac {5 (x+1)^{12}}{272 x^{16}}-\frac {(x+1)^{12}}{204 x^{15}}+\frac {(x+1)^{12}}{952 x^{14}}-\frac {(x+1)^{12}}{6188 x^{13}}+\frac {(x+1)^{12}}{74256 x^{12}} \]

________________________________________________________________________________________

Rubi [A]  time = 0.02, antiderivative size = 73, normalized size of antiderivative = 1.00, number of steps used = 7, number of rules used = 3, integrand size = 17, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.176, Rules used = {27, 45, 37} \begin {gather*} \frac {(x+1)^{12}}{74256 x^{12}}-\frac {(x+1)^{12}}{6188 x^{13}}+\frac {(x+1)^{12}}{952 x^{14}}-\frac {(x+1)^{12}}{204 x^{15}}+\frac {5 (x+1)^{12}}{272 x^{16}}-\frac {(x+1)^{12}}{17 x^{17}} \end {gather*}

Antiderivative was successfully verified.

[In]

Int[((1 + x)*(1 + 2*x + x^2)^5)/x^18,x]

[Out]

-(1 + x)^12/(17*x^17) + (5*(1 + x)^12)/(272*x^16) - (1 + x)^12/(204*x^15) + (1 + x)^12/(952*x^14) - (1 + x)^12
/(6188*x^13) + (1 + x)^12/(74256*x^12)

Rule 27

Int[(u_.)*((a_) + (b_.)*(x_) + (c_.)*(x_)^2)^(p_.), x_Symbol] :> Int[u*Cancel[(b/2 + c*x)^(2*p)/c^p], x] /; Fr
eeQ[{a, b, c}, x] && EqQ[b^2 - 4*a*c, 0] && IntegerQ[p]

Rule 37

Int[((a_.) + (b_.)*(x_))^(m_.)*((c_.) + (d_.)*(x_))^(n_), x_Symbol] :> Simp[((a + b*x)^(m + 1)*(c + d*x)^(n +
1))/((b*c - a*d)*(m + 1)), x] /; FreeQ[{a, b, c, d, m, n}, x] && NeQ[b*c - a*d, 0] && EqQ[m + n + 2, 0] && NeQ
[m, -1]

Rule 45

Int[((a_.) + (b_.)*(x_))^(m_)*((c_.) + (d_.)*(x_))^(n_), x_Symbol] :> Simp[((a + b*x)^(m + 1)*(c + d*x)^(n + 1
))/((b*c - a*d)*(m + 1)), x] - Dist[(d*Simplify[m + n + 2])/((b*c - a*d)*(m + 1)), Int[(a + b*x)^Simplify[m +
1]*(c + d*x)^n, x], x] /; FreeQ[{a, b, c, d, m, n}, x] && NeQ[b*c - a*d, 0] && ILtQ[Simplify[m + n + 2], 0] &&
NeQ[m, -1] &&  !(LtQ[m, -1] && LtQ[n, -1] && (EqQ[a, 0] || (NeQ[c, 0] && LtQ[m - n, 0] && IntegerQ[n]))) && (
SumSimplerQ[m, 1] ||  !SumSimplerQ[n, 1])

Rubi steps

\begin {align*} \int \frac {(1+x) \left (1+2 x+x^2\right )^5}{x^{18}} \, dx &=\int \frac {(1+x)^{11}}{x^{18}} \, dx\\ &=-\frac {(1+x)^{12}}{17 x^{17}}-\frac {5}{17} \int \frac {(1+x)^{11}}{x^{17}} \, dx\\ &=-\frac {(1+x)^{12}}{17 x^{17}}+\frac {5 (1+x)^{12}}{272 x^{16}}+\frac {5}{68} \int \frac {(1+x)^{11}}{x^{16}} \, dx\\ &=-\frac {(1+x)^{12}}{17 x^{17}}+\frac {5 (1+x)^{12}}{272 x^{16}}-\frac {(1+x)^{12}}{204 x^{15}}-\frac {1}{68} \int \frac {(1+x)^{11}}{x^{15}} \, dx\\ &=-\frac {(1+x)^{12}}{17 x^{17}}+\frac {5 (1+x)^{12}}{272 x^{16}}-\frac {(1+x)^{12}}{204 x^{15}}+\frac {(1+x)^{12}}{952 x^{14}}+\frac {1}{476} \int \frac {(1+x)^{11}}{x^{14}} \, dx\\ &=-\frac {(1+x)^{12}}{17 x^{17}}+\frac {5 (1+x)^{12}}{272 x^{16}}-\frac {(1+x)^{12}}{204 x^{15}}+\frac {(1+x)^{12}}{952 x^{14}}-\frac {(1+x)^{12}}{6188 x^{13}}-\frac {\int \frac {(1+x)^{11}}{x^{13}} \, dx}{6188}\\ &=-\frac {(1+x)^{12}}{17 x^{17}}+\frac {5 (1+x)^{12}}{272 x^{16}}-\frac {(1+x)^{12}}{204 x^{15}}+\frac {(1+x)^{12}}{952 x^{14}}-\frac {(1+x)^{12}}{6188 x^{13}}+\frac {(1+x)^{12}}{74256 x^{12}}\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]  time = 0.00, size = 81, normalized size = 1.11 \begin {gather*} -\frac {1}{17 x^{17}}-\frac {11}{16 x^{16}}-\frac {11}{3 x^{15}}-\frac {165}{14 x^{14}}-\frac {330}{13 x^{13}}-\frac {77}{2 x^{12}}-\frac {42}{x^{11}}-\frac {33}{x^{10}}-\frac {55}{3 x^9}-\frac {55}{8 x^8}-\frac {11}{7 x^7}-\frac {1}{6 x^6} \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[((1 + x)*(1 + 2*x + x^2)^5)/x^18,x]

[Out]

-1/17*1/x^17 - 11/(16*x^16) - 11/(3*x^15) - 165/(14*x^14) - 330/(13*x^13) - 77/(2*x^12) - 42/x^11 - 33/x^10 -
55/(3*x^9) - 55/(8*x^8) - 11/(7*x^7) - 1/(6*x^6)

________________________________________________________________________________________

IntegrateAlgebraic [F]  time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \int \frac {(1+x) \left (1+2 x+x^2\right )^5}{x^{18}} \, dx \end {gather*}

Verification is not applicable to the result.

[In]

IntegrateAlgebraic[((1 + x)*(1 + 2*x + x^2)^5)/x^18,x]

[Out]

IntegrateAlgebraic[((1 + x)*(1 + 2*x + x^2)^5)/x^18, x]

________________________________________________________________________________________

fricas [A]  time = 0.39, size = 60, normalized size = 0.82 \begin {gather*} -\frac {12376 \, x^{11} + 116688 \, x^{10} + 510510 \, x^{9} + 1361360 \, x^{8} + 2450448 \, x^{7} + 3118752 \, x^{6} + 2858856 \, x^{5} + 1884960 \, x^{4} + 875160 \, x^{3} + 272272 \, x^{2} + 51051 \, x + 4368}{74256 \, x^{17}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((1+x)*(x^2+2*x+1)^5/x^18,x, algorithm="fricas")

[Out]

-1/74256*(12376*x^11 + 116688*x^10 + 510510*x^9 + 1361360*x^8 + 2450448*x^7 + 3118752*x^6 + 2858856*x^5 + 1884
960*x^4 + 875160*x^3 + 272272*x^2 + 51051*x + 4368)/x^17

________________________________________________________________________________________

giac [A]  time = 0.15, size = 60, normalized size = 0.82 \begin {gather*} -\frac {12376 \, x^{11} + 116688 \, x^{10} + 510510 \, x^{9} + 1361360 \, x^{8} + 2450448 \, x^{7} + 3118752 \, x^{6} + 2858856 \, x^{5} + 1884960 \, x^{4} + 875160 \, x^{3} + 272272 \, x^{2} + 51051 \, x + 4368}{74256 \, x^{17}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((1+x)*(x^2+2*x+1)^5/x^18,x, algorithm="giac")

[Out]

-1/74256*(12376*x^11 + 116688*x^10 + 510510*x^9 + 1361360*x^8 + 2450448*x^7 + 3118752*x^6 + 2858856*x^5 + 1884
960*x^4 + 875160*x^3 + 272272*x^2 + 51051*x + 4368)/x^17

________________________________________________________________________________________

maple [A]  time = 0.05, size = 62, normalized size = 0.85 \begin {gather*} -\frac {1}{6 x^{6}}-\frac {11}{7 x^{7}}-\frac {55}{8 x^{8}}-\frac {55}{3 x^{9}}-\frac {33}{x^{10}}-\frac {42}{x^{11}}-\frac {77}{2 x^{12}}-\frac {330}{13 x^{13}}-\frac {165}{14 x^{14}}-\frac {11}{3 x^{15}}-\frac {11}{16 x^{16}}-\frac {1}{17 x^{17}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((x+1)*(x^2+2*x+1)^5/x^18,x)

[Out]

-11/16/x^16-55/8/x^8-33/x^10-11/3/x^15-165/14/x^14-77/2/x^12-55/3/x^9-11/7/x^7-1/17/x^17-1/6/x^6-42/x^11-330/1
3/x^13

________________________________________________________________________________________

maxima [A]  time = 0.53, size = 60, normalized size = 0.82 \begin {gather*} -\frac {12376 \, x^{11} + 116688 \, x^{10} + 510510 \, x^{9} + 1361360 \, x^{8} + 2450448 \, x^{7} + 3118752 \, x^{6} + 2858856 \, x^{5} + 1884960 \, x^{4} + 875160 \, x^{3} + 272272 \, x^{2} + 51051 \, x + 4368}{74256 \, x^{17}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((1+x)*(x^2+2*x+1)^5/x^18,x, algorithm="maxima")

[Out]

-1/74256*(12376*x^11 + 116688*x^10 + 510510*x^9 + 1361360*x^8 + 2450448*x^7 + 3118752*x^6 + 2858856*x^5 + 1884
960*x^4 + 875160*x^3 + 272272*x^2 + 51051*x + 4368)/x^17

________________________________________________________________________________________

mupad [B]  time = 0.03, size = 60, normalized size = 0.82 \begin {gather*} -\frac {\frac {x^{11}}{6}+\frac {11\,x^{10}}{7}+\frac {55\,x^9}{8}+\frac {55\,x^8}{3}+33\,x^7+42\,x^6+\frac {77\,x^5}{2}+\frac {330\,x^4}{13}+\frac {165\,x^3}{14}+\frac {11\,x^2}{3}+\frac {11\,x}{16}+\frac {1}{17}}{x^{17}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(((x + 1)*(2*x + x^2 + 1)^5)/x^18,x)

[Out]

-((11*x)/16 + (11*x^2)/3 + (165*x^3)/14 + (330*x^4)/13 + (77*x^5)/2 + 42*x^6 + 33*x^7 + (55*x^8)/3 + (55*x^9)/
8 + (11*x^10)/7 + x^11/6 + 1/17)/x^17

________________________________________________________________________________________

sympy [A]  time = 0.20, size = 61, normalized size = 0.84 \begin {gather*} \frac {- 12376 x^{11} - 116688 x^{10} - 510510 x^{9} - 1361360 x^{8} - 2450448 x^{7} - 3118752 x^{6} - 2858856 x^{5} - 1884960 x^{4} - 875160 x^{3} - 272272 x^{2} - 51051 x - 4368}{74256 x^{17}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((1+x)*(x**2+2*x+1)**5/x**18,x)

[Out]

(-12376*x**11 - 116688*x**10 - 510510*x**9 - 1361360*x**8 - 2450448*x**7 - 3118752*x**6 - 2858856*x**5 - 18849
60*x**4 - 875160*x**3 - 272272*x**2 - 51051*x - 4368)/(74256*x**17)

________________________________________________________________________________________